home *** CD-ROM | disk | FTP | other *** search
/ TPUG - Toronto PET Users Group / TPUG Users Group CD / TPUG Users Group CD.iso / CRS / crs19.d81 / poster.sda / POSTER MAKER (.txt) < prev    next >
Commodore BASIC  |  2009-10-10  |  1KB  |  36 lines
  1. 1 PRINTCHR$(142):IFA=2THENGOTO100
  2. 5 PRINT"[147]":POKE53281,0:POKE53280,0:POKE646,1
  3. 10 PRINT"INSTALLING ML. PLEASE WAIT.....
  4. 15 [129] T[178]51200[164]51240:[135]D:[151]T,D:CK[178]CK[170]D:[130]
  5. 30 [131]169,59,141,17,208,169,120,141,24,208,169,198,141,0,221,32,228
  6. 35 [131]255,201,32,240,3,76,15,200,169,20,141,24,208,169,11,141,0,221
  7. 40 [131]169,27,141,17,208,96
  8. 45 [139]A[178]0[167]A[178]1:[147]"MAKER.ML",8,1
  9. 50 [153]"LOADDOODLE!/RUNPAINT"
  10. 55 [153]"C64 POSTER MAKER"
  11. 60 [153]"FOR THE 4023/1526 PRINTER"
  12. 61 [153]"BY  MUSIC MAN3"
  13. 65 [153]"(C)1991 WITCH DOCTOR PRODUCTIONS"
  14. 70 [129]T[178]0[164]3000:[130]
  15. 71 [153]"LOAD":A[178]1
  16. 75 [151]19,3:[133]"FILE NAME (INCLUDE PREFIX): ";P$:[153]
  17. 80 [133]"SOURCE DRIVE: ";SD:[151]19,0:[153]
  18. 85 [153]"WHEN PICTURE IS DISPLAYED, PRESS <SPACE> TO CONTINUE"
  19. 90 [153]:[153]"LOADING "P$
  20. 95 [139]A[178]1[167]A[178]2:[147]P$,SD,1
  21. 100 [158]51200
  22. 105 [153]"LOADPRINT THIS ONE? (Y/N)"
  23. 110 [161]K$:[139]K$[178]""[167]110
  24. 120 [139]K$[179][177]"Y"[175]K$[179][177]"N"[167]105
  25. 125 [139]K$[178]"N"[167][153]"LOAD":[137]150
  26. 130 [153]"LOADMAKE SURE PRINTER IS ON AND PAPER IS   PROPERLY ALIGNED";
  27. 135 [153]" AND THEN PRESS ANY KEY TO BEGIN."
  28. 140 [161]K$:[139]K$[178]""[167]140
  29. 145 [153]"PRINTING "P$:[158]820
  30. 146 [153]"LOADDONE!!!"
  31. 150 [153]"LOADPWAITRINT ANOTHER OR QWAITUIT?"
  32. 155 [161]K$:[139]K$[178]""[167]155
  33. 160 [139]K$[179][177]"P"[175]K$[179][177]"Q"[167]150
  34. 165 [139]K$[178]"P"[167][137]71
  35. 170 [128]
  36.